home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / fish / 676-700 / 687 / xprd / src / pn.c < prev    next >
C/C++ Source or Header  |  1995-03-18  |  565b  |  26 lines
  1. #include <stdio.h>
  2. #include <string.h>
  3. #include <proto/dos.h>
  4. #include <proto/exec.h>
  5.  
  6. static void getpathname(BPTR lock,char *array)
  7. {
  8.     struct FileInfoBlock *fib=AllocMem(sizeof(struct FileInfoBlock),0);
  9.     BPTR newlock;
  10.     if(!fib||!lock) goto xit;
  11.     Examine(lock,fib);
  12.     getpathname(newlock=ParentDir(lock),array);            
  13.     strcat(array,fib->fib_FileName);
  14.     strcat(array,(newlock)?"/":":");
  15. xit:
  16.     if(fib) FreeMem(fib,sizeof(struct FileInfoBlock));
  17.     if(lock) UnLock(lock);
  18.     return;
  19. }
  20.  
  21. void getcdname(char *buffer)
  22. {
  23.     *buffer=0;
  24.     getpathname(Lock("",SHARED_LOCK),buffer);
  25. }    
  26.